Nuprl Lemma : es-stable-2 0,22

es:ES, ixy:Id, TxTy:Type, P:(TxTyProp), LxLy:Knd List.
es-frame(es;i;Lx;x;Tx)
 es-frame(es;i;Ly;y;Ty)
 e@i. (kind(e Lx @ Ly P(x when e,y when e P((x after e),(y after e))
 @i stable state.P(state.x,state.y)   
latex


Definitionshd(l), i<j, ij, l[i], A, P  Q, ij, ||as||, a<b, Case b of inl(x s(x) ; inr(y t(y), kind(e), left+right, s = t, A & B, x:AB(x), E, A/x,yB(x;y), 1of(t), type List, x:AB(x), ES, Void, x:AB(x), Top, AtomFree(T;x), tag(k), lnk(k), isrcv(k), let x = a in b(x), when-after(e;info;pred?;init;Trans;val), state_when(e), outr(x), act(k), val-axiom(E;V;M;info;pred?;init;Trans;Choose;Send;val), Msg(M), islocal(k), kindcase(ka.f(a); l,t.g(l;t) ), source(l), SWellFounded(R(x;y)), destination(l), loc(e), "$token", outl(x), pred(e), isl(x), first(e), pred!(e;e'), if a=b c ; d fi, i=j, rel_exp(T;R;n), x f y, , R^+, e < e', link(e), *, , sender(e), ecase1(e;info;i.f(i);l,e'.g(l;e')), rcv?(e), EOrderAxioms(Epred?info), t  T, Unit, , x:AB(x), EqDecider(T), Atom$n, Id, IdLnk, es_info(es), <a,b>, inl(x), rcv(l,tg), 2of(t), inr(x), locl(a), tl(l), n-m, if a<b c ; d fi, b, if b t else f fi, nth_tl(n;as), n+m, Case of a; nil  s ; x.y, rec:z  t(x;y;z), x.A(x), Y, AB, , {x:AB(x) }, , car.cdr, x:AB(x), P  Q, x(s1,s2), P  Q, P & Q, P  Q, False, x when e, (x after e), f(a), Type, Prop, Dec(P), e@iP(e), {T}, SQType(T), s ~ t, vartype(i;x), loc(e), @i stable state.P(state)  , es-frame(es;i;L;x;T), xt(x), Knd, as @ bs, kind(e), (x  l)
Lemmasdecidable or, alle-at wf, es-frame wf, es-after wf, es-loc wf, es-when wf, Id wf, Id sq, decidable l member, decidable equal Kind, append wf, member append, l member wf, es-kind wf, es-E wf, Knd wf, event system wf

origin